home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / language / pcpil / sample6.pil < prev    next >
Text File  |  1979-12-31  |  2KB  |  118 lines
  1. R:   Circumference of a Circle          
  2. R:    a sample PILOT lesson
  3. R:
  4. R:  set up screen viewports and outlines
  5. TS:m4;v1,38,17,23;b1;f1
  6. G:c3;g0,199;d0,0;d319,0;d319,199;d0,199;d0,134;d319,134
  7. R:
  8. R:  define greek letter pi as character 187 (key F1)
  9. N:Ç
  10. ........
  11. .///////
  12. /./../..
  13. ../../..
  14. ../../..
  15. ../../..
  16. ../../..
  17. ........
  18. R:
  19. R:   introductory section
  20. P:l
  21. T:We all know what a circle is.
  22. :   
  23. TH:Right? 
  24. A:
  25. M:no!don!wr&g
  26. TY:Your just pulling my leg!
  27. WY:15
  28. G:c1;g30,20;h90;*18(f20;r20);
  29. S:200,1;190;160;130;100
  30. G:c2;g200,70;*18(f30;r20);
  31. S:30,1;50;90;140;200;290
  32. G:c3;g150,30;*20(f40;r18);
  33. S:100,1;92;83;74;65;56;50
  34. G:c2;g20,66;h0;*40(f30;r9);
  35. S:*3(100,2;200)
  36. G:c1;g230,64;h0;*20(f30;r18);
  37. S:120,1;90;80;90;120
  38. TX:
  39. T:
  40. T:     Circles look like this.
  41. W:20
  42. T:
  43. :   ( I don't really know what
  44. TH:     they sound like.  )    
  45. W:30
  46. R:
  47. R:  erase both parts of the screen
  48. TS:v1,38,1,15
  49. TX:
  50. TS:v1,38,17,23
  51. R:
  52. R:  discuss the CENTER point
  53. TX:But circles can also be described
  54.   :in mathematical terms.
  55. G:g160,66;h90;c2;f4;c0;f154;c3;l90;f25;r180;*20(f50;r18)
  56. T:Do you know what we call the
  57.  :point marked with a RED dot?
  58. A:
  59. M:yes
  60. TY:Good. What do we call it?
  61. JY:@A
  62. MS:center
  63. TY:Right, the CENTER of the circle.
  64. WY:20
  65. JY:@P
  66. M:mid   
  67. TY:Do you know another word
  68.   :for #%b ?
  69. JY:@A
  70. T1:See the red point inside the circle.
  71. T1:What is it called?
  72. J1:@A
  73. T2:I'll give you a hint...
  74. T2:It is in the middle of the circle.
  75. J2:@A
  76. T:It is called the CENTER.
  77. T:Can you type the word CENTER?
  78. J:@A
  79. R:
  80. R:  get into the RADIUS
  81. P:
  82. TH:push the ENTER key and we will go on
  83. A:
  84. TX:I will draw two lines from the
  85. :center to the edge of the circle.
  86. W:20
  87. G:g160,66;h90;c2;f154;g160,66;h270;c1;f158
  88. T:
  89. W:15
  90. T:Which of the two lines, the RED one
  91. :or the GREEN one, is longer?
  92. A:
  93. MS:yel!blue!white!black
  94. TY:There is no #%b  line...
  95. JY:@A
  96. M:red
  97. TY:No, the red one isn't longer.
  98. :Try again.
  99. JY:@A
  100. MS:green
  101. TY:No, the green one isn't longer.
  102. :Try again.
  103. JY:@A
  104. MS:neither!both!same!equal
  105. TY:Right, they are both the same.
  106. JY:@P
  107. T1:See the red and green lines.
  108. :Which do you suppose is longer?
  109. J1:@a
  110. T:Actually, they are both the same
  111. :length! Can you type the word SAME.
  112. J:@a
  113. P:
  114. TH:push the ENTER key and we will go on
  115. A:
  116. ts:m2;f7;e0
  117. t:end of sample6
  118.